﻿Imports OpenArchive.Document

Namespace OpenArchive
    Namespace System
        Namespace Events
            Public Class ReadEventArguments
                Inherits EventArgs
                Private _doc As Document.Document
                Private _comp As Components.Component

                Sub New(ByVal document As Document.Document, ByVal component As Components.Component)
                    _doc = document
                    _comp = component
                End Sub
                Friend ReadOnly Property Document() As Document.Document
                    Get
                        Return _doc
                    End Get
                End Property
                Friend ReadOnly Property Component() As Components.Component
                    Get
                        Return _comp
                    End Get
                End Property
            End Class
        End Namespace

    End Namespace
End Namespace

